home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / connec1r / form3.frm < prev    next >
Text File  |  1999-07-14  |  2KB  |  58 lines
  1. VERSION 5.00
  2. Begin VB.Form Form3 
  3.    BackColor       =   &H000080FF&
  4.    Caption         =   "Stuff"
  5.    ClientHeight    =   735
  6.    ClientLeft      =   4140
  7.    ClientTop       =   4620
  8.    ClientWidth     =   4335
  9.    ForeColor       =   &H000080FF&
  10.    LinkTopic       =   "Form3"
  11.    ScaleHeight     =   735
  12.    ScaleWidth      =   4335
  13.    Begin VB.CommandButton Command2 
  14.       Caption         =   "Unlock"
  15.       Height          =   375
  16.       Left            =   3120
  17.       TabIndex        =   2
  18.       Top             =   120
  19.       Width           =   1095
  20.    End
  21.    Begin VB.CommandButton Command1 
  22.       Caption         =   "Lock"
  23.       Height          =   375
  24.       Left            =   1800
  25.       TabIndex        =   1
  26.       Top             =   120
  27.       Width           =   1215
  28.    End
  29.    Begin VB.TextBox Text1 
  30.       Height          =   375
  31.       Left            =   120
  32.       TabIndex        =   0
  33.       Text            =   "Hahahahahaha"
  34.       Top             =   120
  35.       Width           =   1455
  36.    End
  37.    Begin VB.Line Line1 
  38.       X1              =   0
  39.       X2              =   5040
  40.       Y1              =   600
  41.       Y2              =   600
  42.    End
  43. End
  44. Attribute VB_Name = "Form3"
  45. Attribute VB_GlobalNameSpace = False
  46. Attribute VB_Creatable = False
  47. Attribute VB_PredeclaredId = True
  48. Attribute VB_Exposed = False
  49. Private Sub Command1_Click()
  50. Text1.Locked = True
  51. Text1.SetFocus
  52. End Sub
  53.  
  54. Private Sub Command2_Click()
  55. Text1.Locked = False
  56. Text1.SetFocus
  57. End Sub
  58.